home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_132985.txt < prev    next >
Text File  |  1990-08-14  |  22KB  |  928 lines
  1. -- card: 132985 from stack: in
  2. -- bmap block id: 147143
  3. -- flags: 4000
  4. -- background id: 2609
  5. -- name: Module Pricing
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global bundlePricing
  9.   if bundlePricing is empty then put "False" into bundlePricing
  10. end openCard
  11.  
  12. on closeCard
  13.   hide card field "Bundle Pricing Note"
  14. end closeCard
  15.  
  16. on mouseUp
  17.   if name of target contains "button" then
  18.     lock screen
  19.     set cursor to watch
  20.     put empty into card field "School Setup"
  21.     put empty into card field "Student Details"
  22.     put empty into card field "Teacher Details"
  23.     put empty into card field "Course Details"
  24.     put empty into card field "Report Manager"
  25.     put empty into card field "Price"
  26.     if not hilite of button "Multi-user" then
  27.       if hilite of card button "Report Cards" then -- Report Cards
  28.         show card field "Report Cards Note"
  29.         add card field "Report Cards" to card field "Price"
  30.         put numtochar of 18 into card field "School Setup"
  31.         put numtochar of 18 into card field "Student Details"
  32.         put numtochar of 18 into card field "Teacher Details"
  33.         put numtochar of 18 into card field "Course Details"
  34.         put numtochar of 18 into card field "Report Manager"
  35.       else
  36.         hide card field "Report Cards Note"
  37.         if hilite of card button "Attendance" then -- Attendance
  38.           add card field "Attendance" to card field "Price"
  39.           put numtochar of 18 into card field "School Setup"
  40.           put numtochar of 18 into card field "Student Details"
  41.           put numtochar of 18 into card field "Report Manager"
  42.         end if
  43.         if hilite of card button "Marks" then -- Marks
  44.           add card field "Marks" to card field "Price"
  45.         end if
  46.       end if
  47.       if hilite of card button "Scheduling" then -- Scheduling
  48.         add card field "Scheduling" to card field "Price"
  49.         put numtochar of 18 into card field "School Setup"
  50.         put numtochar of 18 into card field "Student Details"
  51.         put numtochar of 18 into card field "Teacher Details"
  52.         put numtochar of 18 into card field "Course Details"
  53.       end if
  54.       if hilite of card button "Library" then -- Library
  55.         add card field "Library" to card field "Price"
  56.         put numtochar of 18 into card field "School Setup"
  57.         put numtochar of 18 into card field "Report Manager"
  58.       end if
  59.       if hilite of card button "Advance Booking" then -- Advance Booking
  60.         add card field "Advance Booking" to card field "Price"
  61.         put numtochar of 18 into card field "School Setup"
  62.         put numtochar of 18 into card field "Report Manager"
  63.       end if
  64.     else
  65.       if hilite of card button "Report Cards" then -- Report Cards
  66.         show card field "Report Cards Note"
  67.         add card field "MReport Cards" to card field "Price"
  68.         put numtochar of 18 into card field "School Setup"
  69.         put numtochar of 18 into card field "Student Details"
  70.         put numtochar of 18 into card field "Teacher Details"
  71.         put numtochar of 18 into card field "Course Details"
  72.         put numtochar of 18 into card field "Report Manager"
  73.       else
  74.         hide card field "Report Cards Note"
  75.         if hilite of card button "Attendance" then -- Attendance
  76.           add card field "MAttendance" to card field "Price"
  77.           put numtochar of 18 into card field "School Setup"
  78.           put numtochar of 18 into card field "Student Details"
  79.           put numtochar of 18 into card field "Report Manager"
  80.         end if
  81.         if hilite of card button "Marks" then -- Marks
  82.           add card field "MMarks" to card field "Price"
  83.         end if
  84.       end if
  85.       if hilite of card button "Scheduling" then -- Scheduling
  86.         add card field "MScheduling" to card field "Price"
  87.         put numtochar of 18 into card field "School Setup"
  88.         put numtochar of 18 into card field "Student Details"
  89.         put numtochar of 18 into card field "Teacher Details"
  90.         put numtochar of 18 into card field "Course Details"
  91.       end if
  92.       if hilite of card button "Library" then -- Library
  93.         add card field "MLibrary" to card field "Price"
  94.         put numtochar of 18 into card field "School Setup"
  95.         put numtochar of 18 into card field "Report Manager"
  96.       end if
  97.       if hilite of card button "Advance Booking" then -- Advance Booking
  98.         add card field "MAdvance Booking" to card field "Price"
  99.         put numtochar of 18 into card field "School Setup"
  100.         put numtochar of 18 into card field "Report Manager"
  101.       end if
  102.     end if
  103.     if card field "Price" is empty then -- no modules
  104.       if hilite of button "ASCII Transfer" then
  105.         set hilite of button "ASCII Transfer" to false
  106.         answer "ASCII Transfer is not a standalone module" with "OK"
  107.       end if
  108.       if hilite of button "Scanning" then
  109.         set hilite of button "Scanning" to false
  110.         answer "Scanning is not a standalone module" with "OK"
  111.       end if
  112.       if hilite of button "Query" then
  113.         set hilite of button "Query" to false
  114.         answer "Query is not a standalone module" with "OK"
  115.       end if
  116.       if hilite of button "Health Records" then
  117.         set hilite of button "Health Records" to false
  118.         answer "Health Records is not a standalone module" with "OK"
  119.       end if
  120.       if hilite of button "Guidance" then
  121.         set hilite of button "Guidance" to false
  122.         answer "Guidance is not a standalone module" with "OK"
  123.       end if
  124.     else
  125.       if hilite of button "ASCII Transfer" then
  126.         add card field "ASCII Transfer" to card field "Price"
  127.       end if
  128.       if hilite of button "Scanning" then
  129.         add card field "Scanning" to card field "Price"
  130.       end if
  131.       if hilite of button "Query" AND not hilite of button "Report Cards" then
  132.         add card field "Query" to card field "Price"
  133.       end if
  134.       if hilite of button "Health Records" then
  135.         add card field "Health Records" to card field "Price"
  136.       end if
  137.       if hilite of button "Guidance" then
  138.         add card field "Guidance" to card field "Price"
  139.       end if
  140.     end if
  141.   end if
  142. end mouseUp
  143.  
  144. on resetCard
  145.   repeat with buttonNum = 1 to the number of card buttons
  146.     set hilite of button buttonNum to false
  147.   end repeat
  148.   repeat with fieldNum = 1 to 6
  149.     put empty into card field fieldNum
  150.   end repeat
  151.   hide card field "Report Cards Note"
  152. end resetCard
  153.  
  154. on showFields
  155.   repeat with index = 9 to the number of card fields - 1
  156.     show card field index
  157.     set lockText of card field index to false
  158.   end repeat
  159. end showFields
  160.  
  161. on hideFields
  162.   repeat with index = 9 to the number of card fields - 1
  163.     hide card field index
  164.     set lockText of card field index to true
  165.   end repeat
  166. end hideFields
  167.  
  168.  
  169.  
  170. -- part 1 (button)
  171. -- low flags: 00
  172. -- high flags: A005
  173. -- rect: left=44 top=90 right=108 bottom=168
  174. -- title width / last selected line: 0
  175. -- icon id / first selected line: 0 / 0
  176. -- text alignment: 1
  177. -- font id: 0
  178. -- text size: 12
  179. -- style flags: 0
  180. -- line height: 16
  181. -- part name: Attendance
  182. ----- HyperTalk script -----
  183. on mouseUp
  184.   pass mouseUp
  185. end mouseUp
  186.  
  187.  
  188.  
  189. -- part 2 (button)
  190. -- low flags: 00
  191. -- high flags: A005
  192. -- rect: left=44 top=111 right=129 bottom=168
  193. -- title width / last selected line: 0
  194. -- icon id / first selected line: 0 / 0
  195. -- text alignment: 1
  196. -- font id: 0
  197. -- text size: 12
  198. -- style flags: 0
  199. -- line height: 16
  200. -- part name: Report Cards
  201. ----- HyperTalk script -----
  202. on mouseUp
  203.   pass mouseUp
  204. end mouseUp
  205.  
  206.  
  207.  
  208. -- part 3 (button)
  209. -- low flags: 00
  210. -- high flags: A005
  211. -- rect: left=44 top=132 right=150 bottom=168
  212. -- title width / last selected line: 0
  213. -- icon id / first selected line: 0 / 0
  214. -- text alignment: 1
  215. -- font id: 0
  216. -- text size: 12
  217. -- style flags: 0
  218. -- line height: 16
  219. -- part name: Marks
  220. ----- HyperTalk script -----
  221. on mouseUp
  222.   pass mouseUp
  223. end mouseUp
  224.  
  225.  
  226.  
  227. -- part 4 (button)
  228. -- low flags: 00
  229. -- high flags: A005
  230. -- rect: left=44 top=153 right=171 bottom=168
  231. -- title width / last selected line: 0
  232. -- icon id / first selected line: 0 / 0
  233. -- text alignment: 1
  234. -- font id: 0
  235. -- text size: 12
  236. -- style flags: 0
  237. -- line height: 16
  238. -- part name: Scheduling
  239. ----- HyperTalk script -----
  240. on mouseUp
  241.   pass mouseUp
  242. end mouseUp
  243.  
  244.  
  245.  
  246. -- part 5 (button)
  247. -- low flags: 00
  248. -- high flags: A005
  249. -- rect: left=181 top=90 right=108 bottom=314
  250. -- title width / last selected line: 0
  251. -- icon id / first selected line: 0 / 0
  252. -- text alignment: 1
  253. -- font id: 0
  254. -- text size: 12
  255. -- style flags: 0
  256. -- line height: 16
  257. -- part name: Library
  258. ----- HyperTalk script -----
  259. on mouseUp
  260.   pass mouseUp
  261. end mouseUp
  262.  
  263.  
  264.  
  265. -- part 6 (button)
  266. -- low flags: 00
  267. -- high flags: A005
  268. -- rect: left=181 top=111 right=129 bottom=314
  269. -- title width / last selected line: 0
  270. -- icon id / first selected line: 0 / 0
  271. -- text alignment: 1
  272. -- font id: 0
  273. -- text size: 12
  274. -- style flags: 0
  275. -- line height: 16
  276. -- part name: Advance Booking
  277. ----- HyperTalk script -----
  278. on mouseUp
  279.   pass mouseUp
  280. end mouseUp
  281.  
  282.  
  283.  
  284. -- part 7 (button)
  285. -- low flags: 00
  286. -- high flags: A005
  287. -- rect: left=181 top=132 right=150 bottom=314
  288. -- title width / last selected line: 0
  289. -- icon id / first selected line: 0 / 0
  290. -- text alignment: 1
  291. -- font id: 0
  292. -- text size: 12
  293. -- style flags: 0
  294. -- line height: 16
  295. -- part name: ASCII Transfer
  296. ----- HyperTalk script -----
  297. on mouseUp
  298.   pass mouseUp
  299. end mouseUp
  300.  
  301.  
  302.  
  303. -- part 8 (button)
  304. -- low flags: 00
  305. -- high flags: A005
  306. -- rect: left=181 top=153 right=171 bottom=314
  307. -- title width / last selected line: 0
  308. -- icon id / first selected line: 0 / 0
  309. -- text alignment: 1
  310. -- font id: 0
  311. -- text size: 12
  312. -- style flags: 0
  313. -- line height: 16
  314. -- part name: Scanning
  315. ----- HyperTalk script -----
  316. on mouseUp
  317.   pass mouseUp
  318. end mouseUp
  319.  
  320.  
  321.  
  322. -- part 9 (button)
  323. -- low flags: 00
  324. -- high flags: A005
  325. -- rect: left=327 top=90 right=108 bottom=464
  326. -- title width / last selected line: 0
  327. -- icon id / first selected line: 0 / 0
  328. -- text alignment: 1
  329. -- font id: 0
  330. -- text size: 12
  331. -- style flags: 0
  332. -- line height: 16
  333. -- part name: Query
  334. ----- HyperTalk script -----
  335. on mouseUp
  336.   pass mouseUp
  337. end mouseUp
  338.  
  339.  
  340.  
  341. -- part 10 (button)
  342. -- low flags: 00
  343. -- high flags: A005
  344. -- rect: left=327 top=111 right=129 bottom=464
  345. -- title width / last selected line: 0
  346. -- icon id / first selected line: 0 / 0
  347. -- text alignment: 1
  348. -- font id: 0
  349. -- text size: 12
  350. -- style flags: 0
  351. -- line height: 16
  352. -- part name: Health Records
  353. ----- HyperTalk script -----
  354. on mouseUp
  355.   pass mouseUp
  356. end mouseUp
  357.  
  358.  
  359.  
  360. -- part 11 (button)
  361. -- low flags: 00
  362. -- high flags: A005
  363. -- rect: left=327 top=132 right=150 bottom=464
  364. -- title width / last selected line: 0
  365. -- icon id / first selected line: 0 / 0
  366. -- text alignment: 1
  367. -- font id: 0
  368. -- text size: 12
  369. -- style flags: 0
  370. -- line height: 16
  371. -- part name: Guidance
  372. ----- HyperTalk script -----
  373. on mouseUp
  374.   pass mouseUp
  375. end mouseUp
  376.  
  377.  
  378.  
  379. -- part 12 (button)
  380. -- low flags: 00
  381. -- high flags: A005
  382. -- rect: left=327 top=161 right=179 bottom=464
  383. -- title width / last selected line: 0
  384. -- icon id / first selected line: 0 / 0
  385. -- text alignment: 1
  386. -- font id: 0
  387. -- text size: 12
  388. -- style flags: 0
  389. -- line height: 16
  390. -- part name: Multi-user
  391. ----- HyperTalk script -----
  392. on mouseUp
  393.   pass mouseUp
  394. end mouseUp
  395.  
  396.  
  397.  
  398.  
  399. -- part 13 (field)
  400. -- low flags: 01
  401. -- high flags: 0000
  402. -- rect: left=400 top=273 right=291 bottom=442
  403. -- title width / last selected line: 0
  404. -- icon id / first selected line: 0 / 0
  405. -- text alignment: 65535
  406. -- font id: 3
  407. -- text size: 12
  408. -- style flags: 0
  409. -- line height: 16
  410. -- part name: Price
  411.  
  412.  
  413. -- part 14 (field)
  414. -- low flags: 01
  415. -- high flags: 0000
  416. -- rect: left=42 top=226 right=242 bottom=63
  417. -- title width / last selected line: 0
  418. -- icon id / first selected line: 0 / 0
  419. -- text alignment: 1
  420. -- font id: 0
  421. -- text size: 12
  422. -- style flags: 0
  423. -- line height: 16
  424. -- part name: School Setup
  425.  
  426.  
  427. -- part 15 (field)
  428. -- low flags: 01
  429. -- high flags: 0000
  430. -- rect: left=42 top=247 right=263 bottom=63
  431. -- title width / last selected line: 0
  432. -- icon id / first selected line: 0 / 0
  433. -- text alignment: 1
  434. -- font id: 0
  435. -- text size: 12
  436. -- style flags: 0
  437. -- line height: 16
  438. -- part name: Student Details
  439.  
  440.  
  441. -- part 16 (field)
  442. -- low flags: 01
  443. -- high flags: 0000
  444. -- rect: left=178 top=226 right=242 bottom=199
  445. -- title width / last selected line: 0
  446. -- icon id / first selected line: 0 / 0
  447. -- text alignment: 1
  448. -- font id: 0
  449. -- text size: 12
  450. -- style flags: 0
  451. -- line height: 16
  452. -- part name: Teacher Details
  453.  
  454.  
  455. -- part 17 (field)
  456. -- low flags: 01
  457. -- high flags: 0000
  458. -- rect: left=178 top=247 right=263 bottom=199
  459. -- title width / last selected line: 0
  460. -- icon id / first selected line: 0 / 0
  461. -- text alignment: 1
  462. -- font id: 0
  463. -- text size: 12
  464. -- style flags: 0
  465. -- line height: 16
  466. -- part name: Course Details
  467.  
  468.  
  469. -- part 18 (field)
  470. -- low flags: 01
  471. -- high flags: 0000
  472. -- rect: left=317 top=226 right=242 bottom=338
  473. -- title width / last selected line: 0
  474. -- icon id / first selected line: 0 / 0
  475. -- text alignment: 1
  476. -- font id: 0
  477. -- text size: 12
  478. -- style flags: 0
  479. -- line height: 16
  480. -- part name: Report Manager
  481.  
  482.  
  483. -- part 19 (field)
  484. -- low flags: 01
  485. -- high flags: 0000
  486. -- rect: left=58 top=295 right=334 bottom=406
  487. -- title width / last selected line: 0
  488. -- icon id / first selected line: 0 / 0
  489. -- text alignment: 0
  490. -- font id: 4
  491. -- text size: 9
  492. -- style flags: 0
  493. -- line height: 12
  494. -- part name: Note
  495.  
  496.  
  497. -- part 20 (field)
  498. -- low flags: 80
  499. -- high flags: 0000
  500. -- rect: left=87 top=179 right=193 bottom=409
  501. -- title width / last selected line: 0
  502. -- icon id / first selected line: 0 / 0
  503. -- text alignment: 0
  504. -- font id: 3
  505. -- text size: 9
  506. -- style flags: 0
  507. -- line height: 12
  508. -- part name: Report Cards Note
  509.  
  510.  
  511. -- part 21 (field)
  512. -- low flags: 81
  513. -- high flags: 0000
  514. -- rect: left=7 top=51 right=64 bottom=39
  515. -- title width / last selected line: 0
  516. -- icon id / first selected line: 0 / 0
  517. -- text alignment: 65535
  518. -- font id: 4
  519. -- text size: 9
  520. -- style flags: 0
  521. -- line height: 12
  522. -- part name: MAttendance
  523.  
  524.  
  525. -- part 22 (field)
  526. -- low flags: 81
  527. -- high flags: 0000
  528. -- rect: left=7 top=63 right=76 bottom=39
  529. -- title width / last selected line: 0
  530. -- icon id / first selected line: 0 / 0
  531. -- text alignment: 65535
  532. -- font id: 4
  533. -- text size: 9
  534. -- style flags: 0
  535. -- line height: 12
  536. -- part name: MReport Cards
  537.  
  538.  
  539. -- part 23 (field)
  540. -- low flags: 81
  541. -- high flags: 0000
  542. -- rect: left=7 top=75 right=88 bottom=39
  543. -- title width / last selected line: 0
  544. -- icon id / first selected line: 0 / 0
  545. -- text alignment: 65535
  546. -- font id: 4
  547. -- text size: 9
  548. -- style flags: 0
  549. -- line height: 12
  550. -- part name: MMarks
  551.  
  552.  
  553. -- part 24 (field)
  554. -- low flags: 81
  555. -- high flags: 0000
  556. -- rect: left=7 top=87 right=100 bottom=39
  557. -- title width / last selected line: 0
  558. -- icon id / first selected line: 0 / 0
  559. -- text alignment: 65535
  560. -- font id: 4
  561. -- text size: 9
  562. -- style flags: 0
  563. -- line height: 12
  564. -- part name: MScheduling
  565.  
  566.  
  567. -- part 25 (field)
  568. -- low flags: 81
  569. -- high flags: 0000
  570. -- rect: left=7 top=99 right=112 bottom=39
  571. -- title width / last selected line: 0
  572. -- icon id / first selected line: 0 / 0
  573. -- text alignment: 65535
  574. -- font id: 4
  575. -- text size: 9
  576. -- style flags: 0
  577. -- line height: 12
  578. -- part name: MLibrary
  579.  
  580.  
  581. -- part 26 (field)
  582. -- low flags: 81
  583. -- high flags: 0000
  584. -- rect: left=7 top=111 right=124 bottom=39
  585. -- title width / last selected line: 0
  586. -- icon id / first selected line: 0 / 0
  587. -- text alignment: 65535
  588. -- font id: 4
  589. -- text size: 9
  590. -- style flags: 0
  591. -- line height: 12
  592. -- part name: MAdvance Booking
  593.  
  594.  
  595. -- part 27 (field)
  596. -- low flags: 81
  597. -- high flags: 0000
  598. -- rect: left=473 top=51 right=64 bottom=505
  599. -- title width / last selected line: 0
  600. -- icon id / first selected line: 0 / 0
  601. -- text alignment: 65535
  602. -- font id: 4
  603. -- text size: 9
  604. -- style flags: 0
  605. -- line height: 12
  606. -- part name: Attendance
  607.  
  608.  
  609. -- part 28 (field)
  610. -- low flags: 81
  611. -- high flags: 0000
  612. -- rect: left=473 top=63 right=76 bottom=505
  613. -- title width / last selected line: 0
  614. -- icon id / first selected line: 0 / 0
  615. -- text alignment: 65535
  616. -- font id: 4
  617. -- text size: 9
  618. -- style flags: 0
  619. -- line height: 12
  620. -- part name: Report Cards
  621.  
  622.  
  623. -- part 29 (field)
  624. -- low flags: 81
  625. -- high flags: 0000
  626. -- rect: left=473 top=75 right=88 bottom=505
  627. -- title width / last selected line: 0
  628. -- icon id / first selected line: 0 / 0
  629. -- text alignment: 65535
  630. -- font id: 4
  631. -- text size: 9
  632. -- style flags: 0
  633. -- line height: 12
  634. -- part name: Marks
  635.  
  636.  
  637. -- part 30 (field)
  638. -- low flags: 81
  639. -- high flags: 0000
  640. -- rect: left=473 top=87 right=100 bottom=505
  641. -- title width / last selected line: 0
  642. -- icon id / first selected line: 0 / 0
  643. -- text alignment: 65535
  644. -- font id: 4
  645. -- text size: 9
  646. -- style flags: 0
  647. -- line height: 12
  648. -- part name: Scheduling
  649.  
  650.  
  651. -- part 31 (field)
  652. -- low flags: 81
  653. -- high flags: 0000
  654. -- rect: left=473 top=99 right=112 bottom=505
  655. -- title width / last selected line: 0
  656. -- icon id / first selected line: 0 / 0
  657. -- text alignment: 65535
  658. -- font id: 4
  659. -- text size: 9
  660. -- style flags: 0
  661. -- line height: 12
  662. -- part name: Library
  663.  
  664.  
  665. -- part 32 (field)
  666. -- low flags: 81
  667. -- high flags: 0000
  668. -- rect: left=473 top=111 right=124 bottom=505
  669. -- title width / last selected line: 0
  670. -- icon id / first selected line: 0 / 0
  671. -- text alignment: 65535
  672. -- font id: 4
  673. -- text size: 9
  674. -- style flags: 0
  675. -- line height: 12
  676. -- part name: Advance Booking
  677.  
  678.  
  679. -- part 33 (field)
  680. -- low flags: 81
  681. -- high flags: 0000
  682. -- rect: left=7 top=128 right=141 bottom=39
  683. -- title width / last selected line: 0
  684. -- icon id / first selected line: 0 / 0
  685. -- text alignment: 65535
  686. -- font id: 4
  687. -- text size: 9
  688. -- style flags: 0
  689. -- line height: 12
  690. -- part name: ASCII Transfer
  691.  
  692.  
  693. -- part 34 (field)
  694. -- low flags: 81
  695. -- high flags: 0000
  696. -- rect: left=7 top=140 right=153 bottom=39
  697. -- title width / last selected line: 0
  698. -- icon id / first selected line: 0 / 0
  699. -- text alignment: 65535
  700. -- font id: 4
  701. -- text size: 9
  702. -- style flags: 0
  703. -- line height: 12
  704. -- part name: Scanning
  705.  
  706.  
  707. -- part 35 (field)
  708. -- low flags: 81
  709. -- high flags: 0000
  710. -- rect: left=7 top=152 right=165 bottom=39
  711. -- title width / last selected line: 0
  712. -- icon id / first selected line: 0 / 0
  713. -- text alignment: 65535
  714. -- font id: 4
  715. -- text size: 9
  716. -- style flags: 0
  717. -- line height: 12
  718. -- part name: Query
  719.  
  720.  
  721. -- part 36 (field)
  722. -- low flags: 81
  723. -- high flags: 0000
  724. -- rect: left=7 top=164 right=177 bottom=39
  725. -- title width / last selected line: 0
  726. -- icon id / first selected line: 0 / 0
  727. -- text alignment: 65535
  728. -- font id: 4
  729. -- text size: 9
  730. -- style flags: 0
  731. -- line height: 12
  732. -- part name: Health Records
  733.  
  734.  
  735. -- part 37 (field)
  736. -- low flags: 81
  737. -- high flags: 0000
  738. -- rect: left=7 top=176 right=189 bottom=39
  739. -- title width / last selected line: 0
  740. -- icon id / first selected line: 0 / 0
  741. -- text alignment: 65535
  742. -- font id: 4
  743. -- text size: 9
  744. -- style flags: 0
  745. -- line height: 12
  746. -- part name: Guidance
  747.  
  748.  
  749. -- part 38 (button)
  750. -- low flags: 00
  751. -- high flags: 8000
  752. -- rect: left=266 top=25 right=42 bottom=484
  753. -- title width / last selected line: 0
  754. -- icon id / first selected line: 0 / 0
  755. -- text alignment: 1
  756. -- font id: 0
  757. -- text size: 12
  758. -- style flags: 0
  759. -- line height: 16
  760. -- part name: Bundle Pricing
  761. ----- HyperTalk script -----
  762. on mouseUp
  763.   lock screen
  764.   go next
  765.   unlock screen
  766. end mouseUp
  767.  
  768.  
  769.  
  770. -- part 39 (button)
  771. -- low flags: 00
  772. -- high flags: 2000
  773. -- rect: left=470 top=299 right=334 bottom=504
  774. -- title width / last selected line: 0
  775. -- icon id / first selected line: 5053 / 5053
  776. -- text alignment: 1
  777. -- font id: 0
  778. -- text size: 12
  779. -- style flags: 0
  780. -- line height: 16
  781. -- part name: Return
  782. ----- HyperTalk script -----
  783. on mouseUp
  784.   global bundlePricing
  785.   if bundlePricing then
  786.     lock screen
  787.     resetCard
  788.     go next
  789.     send "resetCard" to this card
  790.     go to card "Demo Shell" of this background
  791.     unlock screen with iris close
  792.   else
  793.     show card field "Bundle Pricing Note"
  794.     repeat for 2
  795.       set hilite of button "Note Flash" to true
  796.       wait 5
  797.       set hilite of button "Note Flash" to false
  798.       wait 5
  799.     end repeat
  800.     wait until the mouseClick
  801.     if the clickLoc is within the rect of button "Bundle Pricing" then
  802.       send "mouseUp" to button "Bundle Pricing"
  803.       exit mouseUp
  804.     else
  805.       repeat for 2
  806.         set hilite of button "Bundle Pricing" to true
  807.         wait 5
  808.         set hilite of button "Bundle Pricing" to false
  809.         wait 5
  810.       end repeat
  811.       put "True" into bundlePricing
  812.     end if
  813.   end if
  814. end mouseUp
  815.  
  816.  
  817.  
  818. -- part 41 (field)
  819. -- low flags: 81
  820. -- high flags: 0001
  821. -- rect: left=58 top=295 right=334 bottom=406
  822. -- title width / last selected line: 0
  823. -- icon id / first selected line: 0 / 0
  824. -- text alignment: 0
  825. -- font id: 4
  826. -- text size: 9
  827. -- style flags: 0
  828. -- line height: 12
  829. -- part name: Bundle Pricing Note
  830.  
  831.  
  832. -- part 42 (button)
  833. -- low flags: 00
  834. -- high flags: 2000
  835. -- rect: left=93 top=295 right=333 bottom=391
  836. -- title width / last selected line: 0
  837. -- icon id / first selected line: 0 / 0
  838. -- text alignment: 1
  839. -- font id: 0
  840. -- text size: 12
  841. -- style flags: 0
  842. -- line height: 16
  843. -- part name: Note Flash
  844.  
  845.  
  846. -- part contents for card part 27
  847. ----- text -----
  848. 950
  849.  
  850. -- part contents for card part 28
  851. ----- text -----
  852. 1950
  853.  
  854. -- part contents for card part 29
  855. ----- text -----
  856. 450
  857.  
  858. -- part contents for card part 30
  859. ----- text -----
  860. 1950
  861.  
  862. -- part contents for card part 31
  863. ----- text -----
  864. 950
  865.  
  866. -- part contents for card part 32
  867. ----- text -----
  868. 1200
  869.  
  870. -- part contents for card part 33
  871. ----- text -----
  872. 300
  873.  
  874. -- part contents for card part 34
  875. ----- text -----
  876. 300
  877.  
  878. -- part contents for card part 35
  879. ----- text -----
  880. 300
  881.  
  882. -- part contents for card part 36
  883. ----- text -----
  884. 300
  885.  
  886. -- part contents for card part 37
  887. ----- text -----
  888. 300
  889.  
  890. -- part contents for card part 21
  891. ----- text -----
  892. 1200
  893.  
  894. -- part contents for card part 22
  895. ----- text -----
  896. 2400
  897.  
  898. -- part contents for card part 23
  899. ----- text -----
  900. 450
  901.  
  902. -- part contents for card part 24
  903. ----- text -----
  904. 2300
  905.  
  906. -- part contents for card part 25
  907. ----- text -----
  908. 1000
  909.  
  910. -- part contents for card part 26
  911. ----- text -----
  912. 1500
  913.  
  914. -- part contents for card part 19
  915. ----- text -----
  916. Note: Multiple school site license pricing is available.
  917.       Contact Chancery Software for more information.
  918.       Prices are in effect until June 1991.
  919.  
  920. -- part contents for card part 20
  921. ----- text -----
  922. * The Report Cards module comes with Attendance, Marks and Query
  923.  
  924. -- part contents for card part 41
  925. ----- text -----
  926. Note: Substantial price savings can be obtained by
  927.       purchasing the above modules in bundles.  Please
  928.       check bundle pricing for more information.